ServerConsole
	var
		numXPRate			= 1
		flagForceCommon		= 1
		flagForceOpen		= 1
		flagStartCash		= FLAG_CASH_MAX
		flagHitPointGen		= FLAG_HP_HALF

		pathDataRepository	= "DATA/"

		numTick				= 30

		numLoaded			= 0

	proc
		getXPRate()
			return numXPRate

		getForceCommon()
			return flagForceCommon

		getForceOpen()
			return flagForceOpen

		getHPStyle()
			return flagHitPointGen

		getTick()
			return numTick

		getDataRepository()
			return pathDataRepository

		loadSettings(txtXMLFileName as text)
			var/XML/Element/xmlRoot	= xmlRootFromFile(txtXMLFileName)
			numXPRate 				= text2num(xmlRoot.Attribute("xp"))
			flagForceCommon			= text2num(xmlRoot.Attribute("forcecommon"))
			flagForceOpen			= text2num(xmlRoot.Attribute("forceopen"))
			flagStartCash			= get_flag(xmlRoot.Attribute("cash"))
			flagHitPointGen			= get_flag(xmlRoot.Attribute("hp"))
			pathDataRepository		= xmlRoot.Attribute("data")
			numTick					= text2num(xmlRoot.Attribute("tick"))

			numLoaded = TRUE

		IsLoaded()
			return numLoaded


	New()
		. = ..()
		loadSettings("server.xml")
		return .